home *** CD-ROM | disk | FTP | other *** search
/ Ham Radio 2000 / Ham Radio 2000.iso / ham2000 / tcp_ip / ntp_src / diff.ntp next >
Text File  |  1992-04-03  |  26KB  |  762 lines
  1. *** /tmp/,RCSt1016606    Tue Jun 25 11:10:51 1991
  2. --- commands.h    Tue Jun 25 10:42:12 1991
  3. ***************
  4. *** 121,126 ****
  5. --- 121,129 ----
  6.   int donetrom __ARGS((int argc,char *argv[],void *p));
  7.   int nr_attach __ARGS((int argc,char *argv[],void *p));
  8.   
  9. + /* In ntpd.c: */
  10. + int dontp __ARGS((int argc, char *argv[], void *p));
  11. + 
  12.   /* In pc.c: */
  13.   int doshell __ARGS((int argc,char *argv[],void *p));
  14.   int doisat __ARGS((int argc,char *argv[],void *p));
  15. *** /tmp/,RCSt1016611    Tue Jun 25 11:10:53 1991
  16. --- config.c    Tue Jun 25 10:42:17 1991
  17. ***************
  18. *** 307,312 ****
  19. --- 307,315 ----
  20.   #ifdef    NRS
  21.       "nrstat",    donrstat,    0, 0, NULLCHAR,
  22.   #endif    /* NRS */
  23. + #ifdef NTP
  24. +     "ntp",        dontp,        0, 0, NULLCHAR,
  25. + #endif /* NTP */
  26.       "param",    doparam,    0, 2, "param <interface>",
  27.       "ping",        doping,        512, 2,
  28.       "ping <hostid> [<length> [<interval> [incflag]]]",
  29. ***************
  30. *** 440,446 ****
  31. --- 443,453 ----
  32.   
  33.   /* Functions to be called on each clock tick */
  34.   void (*Cfunc[])() = {
  35. + #ifdef NTP
  36. +     ntppctick,        /* PC and NTP specific stuff to keep time. */
  37. + #else  /* not NTP */
  38.       pctick,    /* Call PC-specific stuff to keep time */
  39. + #endif /* not NTP */
  40.       kbint,    /* Necessary because there's no hardware keyboard interrupt */
  41.       refiq,    /* Replenish interrupt pool */
  42.   #ifdef    ASY
  43. *** /tmp/,RCSt1016621    Tue Jun 25 11:10:57 1991
  44. --- internet.tl    Tue Jun 25 10:42:21 1991
  45. ***************
  46. *** 23,26 ****
  47.   +arpcmd.obj &
  48.   +arp.obj &
  49.   +arphdr.obj &
  50. ! +netuser.obj
  51. --- 23,39 ----
  52.   +arpcmd.obj &
  53.   +arp.obj &
  54.   +arphdr.obj &
  55. ! +netuser.obj &
  56. ! +ntpd.obj &
  57. ! +ntp_config.obj &
  58. ! +ntp_io.obj &
  59. ! +ntp_leap.obj &
  60. ! +ntp_loopfilter.obj &
  61. ! +ntp_pcclock &
  62. ! +ntp_peer.obj &
  63. ! +ntp_proto.obj &
  64. ! +ntp_restrict.obj &
  65. ! +ntp_timer.obj &
  66. ! +ntp_util.obj &
  67. ! +ntp_control.obj &
  68. ! +ntp_version.obj
  69. *** /tmp/,RCSt1016626    Tue Jun 25 11:11:00 1991
  70. --- makefile    Tue Jun 25 10:42:25 1991
  71. ***************
  72. *** 53,59 ****
  73.       ipcmd.obj ip.obj iproute.obj iphdr.obj \
  74.       icmpcmd.obj icmp.obj icmpmsg.obj icmphdr.obj \
  75.       arpcmd.obj arp.obj arphdr.obj \
  76. !     netuser.obj
  77.   
  78.   AX25=    ax25cmd.obj ax25user.obj ax25.obj \
  79.       axheard.obj lapbtime.obj \
  80. --- 53,62 ----
  81.       ipcmd.obj ip.obj iproute.obj iphdr.obj \
  82.       icmpcmd.obj icmp.obj icmpmsg.obj icmphdr.obj \
  83.       arpcmd.obj arp.obj arphdr.obj \
  84. !     netuser.obj \
  85. !     ntpd.obj ntp_config.obj ntp_io.obj ntp_leap.obj ntp_loopfilter.obj \
  86. !     ntp_pcclock.obj ntp_peer.obj ntp_proto.obj ntp_restrict.obj \
  87. !     ntp_timer.obj ntp_util.obj ntp_version.obj ntp_control.obj
  88.   
  89.   AX25=    ax25cmd.obj ax25user.obj ax25.obj \
  90.       axheard.obj lapbtime.obj \
  91. ***************
  92. *** 82,88 ****
  93.       pc100vec.obj eaglevec.obj hapnvec.obj \
  94.       scc.obj sccvec.obj \
  95.       pi.obj pivec.obj \
  96. !     pcgen.obj sw.obj stopwatch.obj arcnet.obj
  97.   
  98.   makelist.exe: makelist.obj getopt.obj
  99.       $(CC) $(MODEL) makelist.obj getopt.obj
  100. --- 85,92 ----
  101.       pc100vec.obj eaglevec.obj hapnvec.obj \
  102.       scc.obj sccvec.obj \
  103.       pi.obj pivec.obj \
  104. !     pcgen.obj sw.obj stopwatch.obj arcnet.obj \
  105. !     ntp_pc.obj
  106.   
  107.   makelist.exe: makelist.obj getopt.obj
  108.       $(CC) $(MODEL) makelist.obj getopt.obj
  109. ***************
  110. *** 241,247 ****
  111.   nrhdr.obj: nrhdr.c global.h mbuf.h ax25.h iface.h proc.h timer.h sockaddr.h lapb.h netrom.h nr4.h
  112.   nrs.obj: nrs.c global.h mbuf.h iface.h proc.h timer.h pktdrvr.h ax25.h sockaddr.h lapb.h nrs.h asy.h trace.h commands.h
  113.   pathname.obj: pathname.c global.h dirutil.h
  114. ! pc.obj: pc.c global.h mbuf.h proc.h timer.h iface.h internet.h session.h hardware.h ftpcli.h ftp.h telnet.h socket.h sockaddr.h cmdparse.h pc.h
  115.   pc100.obj: pc100.c global.h mbuf.h iface.h proc.h timer.h pktdrvr.h netuser.h pc100.h 8530.h ax25.h sockaddr.h lapb.h trace.h pc.h session.h hardware.h ftpcli.h ftp.h telnet.h
  116.   pi.obj: pi.c global.h mbuf.h iface.h proc.h timer.h pktdrvr.h netuser.h pi.h 8530.h ax25.h sockaddr.h lapb.h trace.h pc.h session.h hardware.h ftpcli.h ftp.h telnet.h ip.h internet.h devparam.h
  117.   pktdrvr.obj: pktdrvr.c global.h proc.h mbuf.h timer.h netuser.h enet.h iface.h arcnet.h ax25.h sockaddr.h lapb.h slip.h slhc.h ip.h internet.h tcp.h ip.h kiss.h ec.h arp.h trace.h pktdrvr.h config.h devparam.h
  118. --- 245,251 ----
  119.   nrhdr.obj: nrhdr.c global.h mbuf.h ax25.h iface.h proc.h timer.h sockaddr.h lapb.h netrom.h nr4.h
  120.   nrs.obj: nrs.c global.h mbuf.h iface.h proc.h timer.h pktdrvr.h ax25.h sockaddr.h lapb.h nrs.h asy.h trace.h commands.h
  121.   pathname.obj: pathname.c global.h dirutil.h
  122. ! pc.obj: pc.c global.h mbuf.h proc.h timer.h iface.h internet.h session.h hardware.h ftpcli.h ftp.h telnet.h socket.h sockaddr.h cmdparse.h pc.h config.h
  123.   pc100.obj: pc100.c global.h mbuf.h iface.h proc.h timer.h pktdrvr.h netuser.h pc100.h 8530.h ax25.h sockaddr.h lapb.h trace.h pc.h session.h hardware.h ftpcli.h ftp.h telnet.h
  124.   pi.obj: pi.c global.h mbuf.h iface.h proc.h timer.h pktdrvr.h netuser.h pi.h 8530.h ax25.h sockaddr.h lapb.h trace.h pc.h session.h hardware.h ftpcli.h ftp.h telnet.h ip.h internet.h devparam.h
  125.   pktdrvr.obj: pktdrvr.c global.h proc.h mbuf.h timer.h netuser.h enet.h iface.h arcnet.h ax25.h sockaddr.h lapb.h slip.h slhc.h ip.h internet.h tcp.h ip.h kiss.h ec.h arp.h trace.h pktdrvr.h config.h devparam.h
  126. ***************
  127. *** 293,296 ****
  128. --- 297,315 ----
  129.   udphdr.obj: udphdr.c global.h mbuf.h ip.h iface.h proc.h timer.h internet.h udp.h netuser.h
  130.   version.obj: version.c
  131.   wildmat.obj: wildmat.c global.h
  132. + ntp_config.obj: ntp_config.c global.h socket.h timer.h sockaddr.h ntp_types.h ntp_syslog.h ntp_fp.h ntp.h netuser.h udp.h iface.h internet.h ip.h
  133. + ntp_io.obj: ntp_io.c global.h mbuf.h iface.h netuser.h socket.h proc.h timer.h sockaddr.h udp.h internet.h ip.h ntp_types.h ntp_syslog.h ntp_fp.h ntp.h
  134. + ntp_leap.obj: ntp_leap.c global.h timer.h sockaddr.h ntp_types.h ntp_syslog.h ntp_fp.h ntp.h netuser.h udp.h iface.h internet.h ip.h
  135. + ntp_loopfilter.obj: ntp_loopfilter.c global.h sockaddr.h ntp_types.h ntp_syslog.h ntp_fp.h ntp.h netuser.h udp.h iface.h internet.h ip.h
  136. + ntp_pcclock.obj: ntp_pcclock.c global.h sockaddr.h timer.h ntp_types.h ntp_syslog.h ntp_fp.h
  137. + ntp_peer.obj: ntp_peer.c global.h sockaddr.h ntp_types.h ntp_syslog.h ntp_fp.h ntp.h netuser.h udp.h iface.h internet.h ip.h
  138. + ntp_proto.obj: ntp_proto.c global.h timer.h sockaddr.h ntp_types.h ntp_syslog.h ntp_fp.h ntp.h netuser.h udp.h iface.h internet.h ip.h
  139. + ntp_restrict.obj: ntp_restrict.c global.h sockaddr.h ntp_types.h ntp_syslog.h ntp_fp.h ntp.h netuser.h udp.h iface.h internet.h ip.h
  140. + ntp_timer.obj: ntp_timer.c global.h timer.h sockaddr.h ntp_types.h ntp_syslog.h ntp_fp.h ntp.h netuser.h udp.h iface.h internet.h ip.h
  141. + ntp_util.obj: ntp_util.c global.h sockaddr.h ntp_types.h ntp_syslog.h ntp_fp.h ntp.h netuser.h udp.h iface.h internet.h ip.h
  142. + ntpd.obj: ntpd.c global.h sockaddr.h ntp_types.h ntp_syslog.h ntp_fp.h ntp.h netuser.h udp.h iface.h internet.h ip.h
  143. + ntp_version.obj: ntp_version.c
  144. + ntp_control.obj: ntp_control.c ntp_control.h ntp_types.h ntp_syslog.h ntp_fp.h ntp.h
  145. + ntp_pc.obj: ntp_pc.asm
  146. + 
  147.   
  148. *** /tmp/,RCSt1016631    Tue Jun 25 11:11:04 1991
  149. --- pc.c    Tue Jun 25 10:42:40 1991
  150. ***************
  151. *** 1,6 ****
  152. --- 1,7 ----
  153.   /* OS- and machine-dependent stuff for IBM-PC running MS-DOS and Turbo-C
  154.    * Copyright 1991 Phil Karn, KA9Q
  155.    */
  156. + 
  157.   #include <stdio.h>
  158.   #include <conio.h>
  159.   #include <dir.h>
  160. ***************
  161. *** 13,19 ****
  162. --- 14,22 ----
  163.   #include <alloc.h>
  164.   #include <stdarg.h>
  165.   #include <bios.h>
  166. + #include <time.h>
  167.   #include "global.h"
  168. + #include "config.h"
  169.   #include "mbuf.h"
  170.   #include "proc.h"
  171.   #include "iface.h"
  172. ***************
  173. *** 23,28 ****
  174. --- 26,39 ----
  175.   #include "cmdparse.h"
  176.   #include "pc.h"
  177.   
  178. + #ifdef NTP
  179. + #include "ntp_types.h"
  180. + #include "ntp_fp.h"
  181. + 
  182. + /* New time keeping added for NTP.  */
  183. + l_fp NClock;
  184. + #endif /* NTP */
  185. + 
  186.   #define    CTLC    0x3
  187.   #define    DEL    0x7f
  188.   
  189. ***************
  190. *** 32,39 ****
  191.   FILE *Rawterm;
  192.   unsigned _stklen = 8192;
  193.   int Tick;
  194.   static int32 Starttime;    
  195. ! int32 Clock;
  196.   
  197.   /* This flag is set by setirq() if IRQ 8-15 is used, indicating
  198.    * that the machine is a PC/AT with a second 8259 interrupt controller.
  199. --- 43,51 ----
  200.   FILE *Rawterm;
  201.   unsigned _stklen = 8192;
  202.   int Tick;
  203. + int SavedTick;            /* timerproc puts the value of Tick here. */
  204.   static int32 Starttime;    
  205. ! int32 Clock;            /* Ticks since NOS started */
  206.   
  207.   /* This flag is set by setirq() if IRQ 8-15 is used, indicating
  208.    * that the machine is a PC/AT with a second 8259 interrupt controller.
  209. ***************
  210. *** 86,91 ****
  211. --- 98,114 ----
  212.       /* Link timer handler into timer interrupt chain */
  213.       chtimer(btick);
  214.   
  215. + #ifdef NTP
  216. +     /* Initialize the NTP clock from DOS. */
  217. + #define    JAN_1970    2208988800L    /* 1970 - 1900 in seconds */
  218. +     { time_t t;
  219. +       (void) time (&t);
  220. +       NClock.l_ui = (unsigned long)t;
  221. +       NClock.l_ui += JAN_1970;
  222. +       NClock.l_uf = 0;
  223. +     }
  224. + #endif /* NTP */
  225. + 
  226.       /* Find out what multitasker we're running under, if any */
  227.       chktasker();
  228.   
  229. ***************
  230. *** 287,292 ****
  231. --- 310,597 ----
  232.       Tick++;
  233.       psignal(&Tick,1);
  234.   }
  235. + 
  236. + 
  237. + #ifdef NTP
  238. + /* This should really be in the NTP source files, but it depends on the
  239. +  * hardware.
  240. +  */
  241. + 
  242. + /* Variables for adjtime().  In NTP timestamp fractional units. */
  243. + /* xntp recommends 500/hz as tickadj (in microseconds).  For the PC,
  244. +  * this is 27.5 usec.  Converting microseconds to NTP fractions we get:
  245. +  */
  246. + int32 tickadj = 0x0001ccbfL;
  247. + /* Storing adjust_time as a signed long in units of NTP fractions limits
  248. +  * us to a max of +- 1/2 second adjustment at any time.
  249. +  */
  250. + int32 adjust_time = 0;
  251. + /* Size of PC tick in ntp fractional units. */
  252. + int32 ntp_tick = 0x0e0f9776L;
  253. + 
  254. + #if 0                /* Now in ntp_pc.asm */
  255. + /* Called from the timer process on every tick.   timerproc() saves the value
  256. +  * of Tick in SavedTick, which is used here to make sure that we don't
  257. +  * lose time if several timer interrupts occur before any are serviced. 
  258. +  */
  259. + void
  260. + ntppctick()
  261. + {
  262. +     int32 adjust;
  263. + 
  264. +     /* Keep the old style clock going as well.  Note that the old
  265. +      * clock will not be corrected by any adjtime() calls.  */
  266. +     Clock += SavedTick;
  267. + 
  268. +     for (; SavedTick; SavedTick--)  {
  269. +         adjust = 0;
  270. +         if (adjust_time)  {
  271. +             if (adjust_time < 0)
  272. +                 adjust = max(-tickadj, adjust_time);
  273. +             else
  274. +                 adjust = min(tickadj, adjust_time);
  275. +             adjust_time -= adjust;
  276. +         }
  277. + 
  278. +         /* assert ((NTP_TICK + tickadj < 2**32) &&
  279. +          *         (NTP_TICK - tickadj > 0))
  280. +          * so that adjust will not wrap around or be negative.
  281. +          */
  282. +         adjust += ntp_tick;
  283. +         /* Add in the adjustment.  adjust > 0 at this point. */
  284. +         /* I should rewrite this in assembler... */
  285. +         L_ADDUF (&NClock, (unsigned long)adjust);
  286. +     }
  287. + }
  288. + #endif /* 0 */
  289. + 
  290. + /* Return tickadj in NTP fractional units. */
  291. + unsigned long
  292. + get_tickadj()
  293. + {
  294. +     return (unsigned long)tickadj;
  295. + }
  296. + 
  297. + /* Return size of a clock tick in NTP fractional units. */
  298. + unsigned long
  299. + get_tick()
  300. + {
  301. +     return ntp_tick;
  302. + }
  303. + 
  304. + /* adjtime takes an NTP fraction to be adjusted, and returns any
  305. +  * previous adjustment that hadn't completed.
  306. +  */
  307. + int32
  308. + adjtime (frac)
  309. + int32 frac;
  310. + {
  311. +     int32 old = adjust_time;
  312. +     adjust_time = frac;
  313. +     return old;
  314. + }
  315. + 
  316. + /* Tables for converting from "microticks" to NTP timestamps. */
  317. + unsigned long uticktotslo[256] = {
  318. +     0x00000000, 0x00000e10, 0x00001c1f, 0x00002a2f,
  319. +     0x0000383e, 0x0000464e, 0x0000545e, 0x0000626d,
  320. +     0x0000707d, 0x00007e8c, 0x00008c9c, 0x00009aac,
  321. +     0x0000a8bb, 0x0000b6cb, 0x0000c4da, 0x0000d2ea,
  322. +     0x0000e0f9, 0x0000ef09, 0x0000fd19, 0x00010b28,
  323. +     0x00011938, 0x00012747, 0x00013557, 0x00014367,
  324. +     0x00015176, 0x00015f86, 0x00016d95, 0x00017ba5,
  325. +     0x000189b5, 0x000197c4, 0x0001a5d4, 0x0001b3e3,
  326. +     0x0001c1f3, 0x0001d003, 0x0001de12, 0x0001ec22,
  327. +     0x0001fa31, 0x00020841, 0x00021650, 0x00022460,
  328. +     0x00023270, 0x0002407f, 0x00024e8f, 0x00025c9e,
  329. +     0x00026aae, 0x000278be, 0x000286cd, 0x000294dd,
  330. +     0x0002a2ec, 0x0002b0fc, 0x0002bf0c, 0x0002cd1b,
  331. +     0x0002db2b, 0x0002e93a, 0x0002f74a, 0x0003055a,
  332. +     0x00031369, 0x00032179, 0x00032f88, 0x00033d98,
  333. +     0x00034ba7, 0x000359b7, 0x000367c7, 0x000375d6,
  334. +     0x000383e6, 0x000391f5, 0x0003a005, 0x0003ae15,
  335. +     0x0003bc24, 0x0003ca34, 0x0003d843, 0x0003e653,
  336. +     0x0003f463, 0x00040272, 0x00041082, 0x00041e91,
  337. +     0x00042ca1, 0x00043ab1, 0x000448c0, 0x000456d0,
  338. +     0x000464df, 0x000472ef, 0x000480ff, 0x00048f0e,
  339. +     0x00049d1e, 0x0004ab2d, 0x0004b93d, 0x0004c74c,
  340. +     0x0004d55c, 0x0004e36c, 0x0004f17b, 0x0004ff8b,
  341. +     0x00050d9a, 0x00051baa, 0x000529ba, 0x000537c9,
  342. +     0x000545d9, 0x000553e8, 0x000561f8, 0x00057008,
  343. +     0x00057e17, 0x00058c27, 0x00059a36, 0x0005a846,
  344. +     0x0005b656, 0x0005c465, 0x0005d275, 0x0005e084,
  345. +     0x0005ee94, 0x0005fca3, 0x00060ab3, 0x000618c3,
  346. +     0x000626d2, 0x000634e2, 0x000642f1, 0x00065101,
  347. +     0x00065f11, 0x00066d20, 0x00067b30, 0x0006893f,
  348. +     0x0006974f, 0x0006a55f, 0x0006b36e, 0x0006c17e,
  349. +     0x0006cf8d, 0x0006dd9d, 0x0006ebad, 0x0006f9bc,
  350. +     0x000707cc, 0x000715db, 0x000723eb, 0x000731fb,
  351. +     0x0007400a, 0x00074e1a, 0x00075c29, 0x00076a39,
  352. +     0x00077848, 0x00078658, 0x00079468, 0x0007a277,
  353. +     0x0007b087, 0x0007be96, 0x0007cca6, 0x0007dab6,
  354. +     0x0007e8c5, 0x0007f6d5, 0x000804e4, 0x000812f4,
  355. +     0x00082104, 0x00082f13, 0x00083d23, 0x00084b32,
  356. +     0x00085942, 0x00086752, 0x00087561, 0x00088371,
  357. +     0x00089180, 0x00089f90, 0x0008ad9f, 0x0008bbaf,
  358. +     0x0008c9bf, 0x0008d7ce, 0x0008e5de, 0x0008f3ed,
  359. +     0x000901fd, 0x0009100d, 0x00091e1c, 0x00092c2c,
  360. +     0x00093a3b, 0x0009484b, 0x0009565b, 0x0009646a,
  361. +     0x0009727a, 0x00098089, 0x00098e99, 0x00099ca9,
  362. +     0x0009aab8, 0x0009b8c8, 0x0009c6d7, 0x0009d4e7,
  363. +     0x0009e2f6, 0x0009f106, 0x0009ff16, 0x000a0d25,
  364. +     0x000a1b35, 0x000a2944, 0x000a3754, 0x000a4564,
  365. +     0x000a5373, 0x000a6183, 0x000a6f92, 0x000a7da2,
  366. +     0x000a8bb2, 0x000a99c1, 0x000aa7d1, 0x000ab5e0,
  367. +     0x000ac3f0, 0x000ad200, 0x000ae00f, 0x000aee1f,
  368. +     0x000afc2e, 0x000b0a3e, 0x000b184e, 0x000b265d,
  369. +     0x000b346d, 0x000b427c, 0x000b508c, 0x000b5e9b,
  370. +     0x000b6cab, 0x000b7abb, 0x000b88ca, 0x000b96da,
  371. +     0x000ba4e9, 0x000bb2f9, 0x000bc109, 0x000bcf18,
  372. +     0x000bdd28, 0x000beb37, 0x000bf947, 0x000c0757,
  373. +     0x000c1566, 0x000c2376, 0x000c3185, 0x000c3f95,
  374. +     0x000c4da5, 0x000c5bb4, 0x000c69c4, 0x000c77d3,
  375. +     0x000c85e3, 0x000c93f2, 0x000ca202, 0x000cb012,
  376. +     0x000cbe21, 0x000ccc31, 0x000cda40, 0x000ce850,
  377. +     0x000cf660, 0x000d046f, 0x000d127f, 0x000d208e,
  378. +     0x000d2e9e, 0x000d3cae, 0x000d4abd, 0x000d58cd,
  379. +     0x000d66dc, 0x000d74ec, 0x000d82fc, 0x000d910b,
  380. +     0x000d9f1b, 0x000dad2a, 0x000dbb3a, 0x000dc94a,
  381. +     0x000dd759, 0x000de569, 0x000df378, 0x000e0188
  382. + };
  383. + 
  384. + unsigned long uticktotshi[256] = {
  385. +     0x00000000, 0x000e0f97, 0x001c1f2f, 0x002a2ec6,
  386. +     0x00383e5e, 0x00464df5, 0x00545d8d, 0x00626d24,
  387. +     0x00707cbc, 0x007e8c53, 0x008c9beb, 0x009aab82,
  388. +     0x00a8bb1a, 0x00b6cab1, 0x00c4da48, 0x00d2e9e0,
  389. +     0x00e0f977, 0x00ef090f, 0x00fd18a6, 0x010b283e,
  390. +     0x011937d5, 0x0127476d, 0x01355704, 0x0143669c,
  391. +     0x01517633, 0x015f85ca, 0x016d9562, 0x017ba4f9,
  392. +     0x0189b491, 0x0197c428, 0x01a5d3c0, 0x01b3e357,
  393. +     0x01c1f2ef, 0x01d00286, 0x01de121e, 0x01ec21b5,
  394. +     0x01fa314d, 0x020840e4, 0x0216507b, 0x02246013,
  395. +     0x02326faa, 0x02407f42, 0x024e8ed9, 0x025c9e71,
  396. +     0x026aae08, 0x0278bda0, 0x0286cd37, 0x0294dccf,
  397. +     0x02a2ec66, 0x02b0fbfe, 0x02bf0b95, 0x02cd1b2c,
  398. +     0x02db2ac4, 0x02e93a5b, 0x02f749f3, 0x0305598a,
  399. +     0x03136922, 0x032178b9, 0x032f8851, 0x033d97e8,
  400. +     0x034ba780, 0x0359b717, 0x0367c6ae, 0x0375d646,
  401. +     0x0383e5dd, 0x0391f575, 0x03a0050c, 0x03ae14a4,
  402. +     0x03bc243b, 0x03ca33d3, 0x03d8436a, 0x03e65302,
  403. +     0x03f46299, 0x04027231, 0x041081c8, 0x041e915f,
  404. +     0x042ca0f7, 0x043ab08e, 0x0448c026, 0x0456cfbd,
  405. +     0x0464df55, 0x0472eeec, 0x0480fe84, 0x048f0e1b,
  406. +     0x049d1db3, 0x04ab2d4a, 0x04b93ce2, 0x04c74c79,
  407. +     0x04d55c10, 0x04e36ba8, 0x04f17b3f, 0x04ff8ad7,
  408. +     0x050d9a6e, 0x051baa06, 0x0529b99d, 0x0537c935,
  409. +     0x0545d8cc, 0x0553e864, 0x0561f7fb, 0x05700792,
  410. +     0x057e172a, 0x058c26c1, 0x059a3659, 0x05a845f0,
  411. +     0x05b65588, 0x05c4651f, 0x05d274b7, 0x05e0844e,
  412. +     0x05ee93e6, 0x05fca37d, 0x060ab315, 0x0618c2ac,
  413. +     0x0626d243, 0x0634e1db, 0x0642f172, 0x0651010a,
  414. +     0x065f10a1, 0x066d2039, 0x067b2fd0, 0x06893f68,
  415. +     0x06974eff, 0x06a55e97, 0x06b36e2e, 0x06c17dc6,
  416. +     0x06cf8d5d, 0x06dd9cf4, 0x06ebac8c, 0x06f9bc23,
  417. +     0x0707cbbb, 0x0715db52, 0x0723eaea, 0x0731fa81,
  418. +     0x07400a19, 0x074e19b0, 0x075c2948, 0x076a38df,
  419. +     0x07784876, 0x0786580e, 0x079467a5, 0x07a2773d,
  420. +     0x07b086d4, 0x07be966c, 0x07cca603, 0x07dab59b,
  421. +     0x07e8c532, 0x07f6d4ca, 0x0804e461, 0x0812f3f9,
  422. +     0x08210390, 0x082f1327, 0x083d22bf, 0x084b3256,
  423. +     0x085941ee, 0x08675185, 0x0875611d, 0x088370b4,
  424. +     0x0891804c, 0x089f8fe3, 0x08ad9f7b, 0x08bbaf12,
  425. +     0x08c9beaa, 0x08d7ce41, 0x08e5ddd8, 0x08f3ed70,
  426. +     0x0901fd07, 0x09100c9f, 0x091e1c36, 0x092c2bce,
  427. +     0x093a3b65, 0x09484afd, 0x09565a94, 0x09646a2c,
  428. +     0x097279c3, 0x0980895a, 0x098e98f2, 0x099ca889,
  429. +     0x09aab821, 0x09b8c7b8, 0x09c6d750, 0x09d4e6e7,
  430. +     0x09e2f67f, 0x09f10616, 0x09ff15ae, 0x0a0d2545,
  431. +     0x0a1b34dd, 0x0a294474, 0x0a37540b, 0x0a4563a3,
  432. +     0x0a53733a, 0x0a6182d2, 0x0a6f9269, 0x0a7da201,
  433. +     0x0a8bb198, 0x0a99c130, 0x0aa7d0c7, 0x0ab5e05f,
  434. +     0x0ac3eff6, 0x0ad1ff8e, 0x0ae00f25, 0x0aee1ebc,
  435. +     0x0afc2e54, 0x0b0a3deb, 0x0b184d83, 0x0b265d1a,
  436. +     0x0b346cb2, 0x0b427c49, 0x0b508be1, 0x0b5e9b78,
  437. +     0x0b6cab10, 0x0b7abaa7, 0x0b88ca3e, 0x0b96d9d6,
  438. +     0x0ba4e96d, 0x0bb2f905, 0x0bc1089c, 0x0bcf1834,
  439. +     0x0bdd27cb, 0x0beb3763, 0x0bf946fa, 0x0c075692,
  440. +     0x0c156629, 0x0c2375c1, 0x0c318558, 0x0c3f94ef,
  441. +     0x0c4da487, 0x0c5bb41e, 0x0c69c3b6, 0x0c77d34d,
  442. +     0x0c85e2e5, 0x0c93f27c, 0x0ca20214, 0x0cb011ab,
  443. +     0x0cbe2143, 0x0ccc30da, 0x0cda4072, 0x0ce85009,
  444. +     0x0cf65fa0, 0x0d046f38, 0x0d127ecf, 0x0d208e67,
  445. +     0x0d2e9dfe, 0x0d3cad96, 0x0d4abd2d, 0x0d58ccc5,
  446. +     0x0d66dc5c, 0x0d74ebf4, 0x0d82fb8b, 0x0d910b22,
  447. +     0x0d9f1aba, 0x0dad2a51, 0x0dbb39e9, 0x0dc94980,
  448. +     0x0dd75918, 0x0de568af, 0x0df37847, 0x0e0187de
  449. + };
  450. + 
  451. + #if 0                /* Now in ntp_pc.asm */
  452. + /* getntptimeofday:  Returns the current time as an NTP timestamp. */
  453. + void
  454. + getntptimeofday (ts)
  455. + l_fp *ts;            /* return value */
  456. + {
  457. +     /* Copied and adapted from msclock() */
  458. +     int32 hi;
  459. +     int16 lo;
  460. +     int ticks;
  461. +     int32 bits;
  462. + 
  463. +     if(!Isat)  {
  464. +         *ts = NClock;
  465. +         return;
  466. +     }
  467. + 
  468. +     /* Make sure that a clock tick doesn't happen while we're
  469. +      * grabbing the clock bits.
  470. +      */
  471. +     do {
  472. +         hi = Clock + Tick + SavedTick;
  473. +         *ts = NClock;
  474. +         bits = clockbits();
  475. +         lo = bits;
  476. +         ticks = Tick + SavedTick + (bits >> 16);
  477. +     } while(hi != Clock + Tick + SavedTick);
  478. + 
  479. +     lo = -lo;        /* lo counts *down* */
  480. +     /* Convert to NTP fractional unit by table lookup. */
  481. +     hi = uticktotslo[lo & 0xff];
  482. +     hi += uticktotshi[lo >> 8];
  483. +     /* Again, I should maybe write this in assembler... */
  484. +     L_ADDUF (ts, hi);
  485. +     
  486. +     /* Adjust the time stamp as best I can for any yet-unprocessed
  487. +      * clock ticks by adding in the nominal tick value.
  488. +      */
  489. +     while (ticks--)  {
  490. +         L_ADDUF (ts, (unsigned long)ntp_tick);
  491. +     }
  492. + }
  493. + #endif /* 0 */
  494. + 
  495. + /* Step the time by ts.  */
  496. + void
  497. + stepntptime (ts)
  498. + l_fp *ts;
  499. + {
  500. +     /* Don't have to disable interrupts here since NClock is not
  501. +      * mucked with at interrupt level.
  502. +      */
  503. +     L_ADD(&NClock, ts);
  504. + }
  505. + 
  506. + /* Function to set DOS time to NTP time.  Called on exit
  507. +  * (and maybe hourly as well)
  508. +  */
  509. + void
  510. + setdostime()
  511. + {
  512. +     time_t t = (time_t)(NClock.l_ui - JAN_1970);
  513. +     stime (&t);
  514. + }
  515. + 
  516. + #else  /* not NTP */
  517.   /* Called from the timer process on every tick. NOTE! This function
  518.    * can NOT be called at interrupt time because it calls the BIOS
  519.    */
  520. ***************
  521. *** 305,310 ****
  522. --- 610,616 ----
  523.       oldt = t;
  524.       Clock = (days * 0x1800b0) + t - Starttime;
  525.   }
  526. + #endif /* not NTP */
  527.   
  528.   /* Set bit(s) in I/O port */
  529.   void
  530. ***************
  531. *** 551,558 ****
  532.   int32
  533.   msclock()
  534.   {
  535. !     int32 hi;
  536. !     int16 lo;
  537.       int16 count[4];    /* extended (48-bit) counter of timer clocks */
  538.   
  539.       if(!Isat)
  540. --- 857,864 ----
  541.   int32
  542.   msclock()
  543.   {
  544. !     int32 hi, bits;
  545. !     int16 lo, ticks;
  546.       int16 count[4];    /* extended (48-bit) counter of timer clocks */
  547.   
  548.       if(!Isat)
  549. ***************
  550. *** 559,568 ****
  551.           return Clock * MSPTICK;
  552.   
  553.       do {
  554. !         hi = Clock + Tick;
  555. !         lo = clockbits();
  556. !     } while(hi != Clock + Tick);
  557.   
  558.       count[0] = 0;
  559.       count[1] = hi >> 16;
  560.       count[2] = hi;
  561. --- 865,878 ----
  562.           return Clock * MSPTICK;
  563.   
  564.       do {
  565. !         hi = Clock + Tick + SavedTick;
  566. !         bits = clockbits();
  567. !         lo = bits & 0xffff;
  568. !         ticks = bits >> 16;
  569. !     } while(hi != Clock + Tick + SavedTick);
  570.   
  571. +     hi += ticks;
  572. + 
  573.       count[0] = 0;
  574.       count[1] = hi >> 16;
  575.       count[2] = hi;
  576. ***************
  577. *** 575,582 ****
  578.   int32
  579.   secclock()
  580.   {
  581. !     int32 hi;
  582. !     int16 lo;
  583.       int16 count[4];    /* extended (48-bit) counter of timer clocks */
  584.   
  585.       if(!Isat)
  586. --- 885,892 ----
  587.   int32
  588.   secclock()
  589.   {
  590. !     int32 hi, bits;
  591. !     int16 lo, ticks;
  592.       int16 count[4];    /* extended (48-bit) counter of timer clocks */
  593.   
  594.       if(!Isat)
  595. ***************
  596. *** 583,591 ****
  597.           return (Clock * MSPTICK) / 1000L;
  598.   
  599.       do {
  600. !         hi = Clock + Tick;
  601. !         lo = clockbits();
  602. !     } while(hi != Clock + Tick);
  603.   
  604.       count[0] = 0;
  605.       count[1] = hi >> 16;
  606. --- 893,905 ----
  607.           return (Clock * MSPTICK) / 1000L;
  608.   
  609.       do {
  610. !         hi = Clock + Tick + SavedTick;
  611. !         bits = clockbits();
  612. !         lo = bits & 0xffff;
  613. !         ticks = bits >> 16;
  614. !     } while(hi != Clock + Tick + SavedTick);
  615. ! 
  616. !     hi += ticks;
  617.   
  618.       count[0] = 0;
  619.       count[1] = hi >> 16;
  620. *** /tmp/,RCSt1016643    Tue Jun 25 11:11:09 1991
  621. --- pc.h    Tue Jun 25 10:42:42 1991
  622. ***************
  623. *** 70,76 ****
  624.   int16 longmul __ARGS((int16 multiplier,int n,int16 *multiplicand));
  625.   INTERRUPT nullvec __ARGS((void));
  626.   void uchtimer __ARGS((void));
  627. ! int16 clockbits __ARGS((void));
  628.   
  629.   /* In stopwatch.asm: */
  630.   void swstart __ARGS((void));
  631. --- 70,79 ----
  632.   int16 longmul __ARGS((int16 multiplier,int n,int16 *multiplicand));
  633.   INTERRUPT nullvec __ARGS((void));
  634.   void uchtimer __ARGS((void));
  635. ! int32 clockbits __ARGS((void));
  636. ! 
  637. ! /* In ntp_pc.asm: */
  638. ! void ntppctick __ARGS((void));
  639.   
  640.   /* In stopwatch.asm: */
  641.   void swstart __ARGS((void));
  642. *** /tmp/,RCSt1016648    Tue Jun 25 11:11:11 1991
  643. --- pc.tl    Tue Jun 25 10:42:43 1991
  644. ***************
  645. *** 26,30 ****
  646.   +pivec.obj &
  647.   +pcgen.obj &
  648.   +sw.obj &
  649. ! +stopwatch.obj
  650.   
  651. --- 26,31 ----
  652.   +pivec.obj &
  653.   +pcgen.obj &
  654.   +sw.obj &
  655. ! +stopwatch.obj &
  656. ! +ntp_pc.obj
  657.   
  658. *** /tmp/,RCSt1016653    Tue Jun 25 11:11:13 1991
  659. --- pcgen.asm    Tue Jun 25 10:42:48 1991
  660. ***************
  661. *** 197,208 ****
  662.   ; the 8253 in the PC/XT lacks a command to read the OUTPUT pin...
  663.   ;
  664.   ; The PC's clock design is soooo brain damaged...
  665. ! 
  666.       public    clockbits
  667.   clockbits    proc
  668. !     mov    al,0c2h    ; latch timer 0 count and status for reading
  669.       pushf
  670.       cli        ; make chip references atomic
  671.       out    43h,al    ; send latch command
  672.       in    al,40h    ; get status of timer 0
  673.       mov    bl,al    ; save status
  674. --- 197,225 ----
  675.   ; the 8253 in the PC/XT lacks a command to read the OUTPUT pin...
  676.   ;
  677.   ; The PC's clock design is soooo brain damaged...
  678. ! ;
  679. ! ; Clockbits is now defined to return a long, with the number of
  680. ! ; unhandled clock interrupts in the high word.  The pc can't really
  681. ! ; count unhandled interrupts, but we can check to see if there is a
  682. ! ; clock interrupt pending (which could be the case if interrupts are turned
  683. ! ; off), and return a 1 in the high word if this is the case.  We
  684. ! ; read the interrupt request register before and after reading the clock
  685. ! ; to make sure that the clock doesn't wrap around while we're reading
  686. ! ; it.
  687.       public    clockbits
  688.   clockbits    proc
  689. !     mov    al,0ah    ; 0ah tells 8259 to read the interrupt request reg.
  690.       pushf
  691.       cli        ; make chip references atomic
  692. +     out    20h,al    ; Request to read interrupt request register
  693. +     nop        ; settling delay
  694. +     nop        ; (eoi does this, so me too)
  695. +     nop
  696. +     in    al,20h    ; Actually get the IRR
  697. + @@1:
  698. +     mov    dl,al    ; save the IRR
  699. +     and    dl,1    ; Only care about bit zero.
  700. +     mov    al,0c2h    ; latch timer 0 count and status for reading
  701.       out    43h,al    ; send latch command
  702.       in    al,40h    ; get status of timer 0
  703.       mov    bl,al    ; save status
  704. ***************
  705. *** 209,215 ****
  706. --- 226,244 ----
  707.       in    al,40h    ; get lsb of count
  708.       mov    ah,al    ; save lsb
  709.       in    al,40h    ; get msb of count
  710. +     mov    cx,ax    ; Save the count since we'll need it later.
  711. +     mov    al,0ah    ; Now read the IRR again.
  712. +     out    20h,al
  713. +     nop
  714. +     nop
  715. +     nop
  716. +     in    al,20h
  717. +     and    al,1    ; only care about bit 0
  718. +     cmp    al,dl    ; Is the IRR the same as the first time around?
  719. +     jne    @@1    ; nope
  720.       popf        ; no more chip references
  721. +     mov    dh,0    ; Clear any garbage in the high byte of dx
  722. +     mov    ax,cx    ; get the count back from storage
  723.       and    bl,80h    ; we're only interested in the OUT bit
  724.       xchg    ah,al    ; ax = count in correct order
  725.       shr    ax,1    ; count /= 2
  726. *** /tmp/,RCSt1016658    Tue Jun 25 11:11:15 1991
  727. --- timer.c    Tue Jun 25 10:42:50 1991
  728. ***************
  729. *** 34,39 ****
  730. --- 34,40 ----
  731.           i_state = dirps();    /* Tick is modified by an interrupt */
  732.           while(Tick == 0)
  733.               pwait(&Tick);
  734. +         SavedTick = Tick;
  735.           Tick = 0;
  736.           restore(i_state);
  737.   
  738. *** /tmp/,RCSt1016665    Tue Jun 25 11:11:17 1991
  739. --- timer.h    Tue Jun 25 10:42:52 1991
  740. ***************
  741. *** 39,44 ****
  742. --- 39,45 ----
  743.   #define    run_timer(t)    ((t)->state == TIMER_RUN)
  744.   
  745.   extern int Tick;
  746. + extern int SavedTick;
  747.   extern void (*Cfunc[])();    /* List of clock tick functions */
  748.   
  749.   /* In timer.c: */
  750. ***************
  751. *** 53,57 ****
  752. --- 54,62 ----
  753.   /* In hardware.c: */
  754.   int32 msclock __ARGS((void));
  755.   int32 secclock __ARGS((void));
  756. + unsigned long get_tickadj();
  757. + unsigned long get_tick();
  758. + int32 adjtime __ARGS((int32));
  759. + void setdostime();
  760.   
  761.   #endif    /* _TIMER_H */
  762.